Font2Script
returns a short; the script code
Font2Script translates a fond ID number into a script code.
fontNumber identifies the font for which you want the script code.
Returns: a short; the script code for the font in question.
Notes: You can use this routine to determine which script owns a particular font
and, therefore, which fonts are usable under a given script.